

<!DOCTYPE html>
<html class="writer-html5" lang="en" >
<head>
  <meta charset="utf-8" />
  <meta name="generator" content="Docutils 0.19: https://docutils.sourceforge.io/" />

  <meta name="viewport" content="width=device-width, initial-scale=1.0" />
  
  <title>Perl S3 Examples &mdash; Ceph Documentation</title>
  

  
  <link rel="stylesheet" href="../../../_static/ceph.css" type="text/css" />
  <link rel="stylesheet" href="../../../_static/pygments.css" type="text/css" />
  <link rel="stylesheet" href="../../../_static/pygments.css" type="text/css" />
  <link rel="stylesheet" href="../../../_static/ceph.css" type="text/css" />
  <link rel="stylesheet" href="../../../_static/graphviz.css" type="text/css" />
  <link rel="stylesheet" href="../../../_static/css/custom.css" type="text/css" />

  
  

  
  

  

  
  <!--[if lt IE 9]>
    <script src="../../../_static/js/html5shiv.min.js"></script>
  <![endif]-->
  
    
      <script type="text/javascript" id="documentation_options" data-url_root="../../../" src="../../../_static/documentation_options.js"></script>
        <script src="../../../_static/jquery.js"></script>
        <script src="../../../_static/_sphinx_javascript_frameworks_compat.js"></script>
        <script data-url_root="../../../" id="documentation_options" src="../../../_static/documentation_options.js"></script>
        <script src="../../../_static/doctools.js"></script>
        <script src="../../../_static/sphinx_highlight.js"></script>
    
    <script type="text/javascript" src="../../../_static/js/theme.js"></script>

    
    <link rel="index" title="Index" href="../../../genindex/" />
    <link rel="search" title="Search" href="../../../search/" />
    <link rel="next" title="PHP S3 实例" href="../php/" />
    <link rel="prev" title="Java S3 Examples" href="../java/" /> 
</head>

<body class="wy-body-for-nav">

   
  <header class="top-bar">
    <div role="navigation" aria-label="Page navigation">
  <ul class="wy-breadcrumbs">
      <li><a href="../../../" class="icon icon-home" aria-label="Home"></a></li>
          <li class="breadcrumb-item"><a href="../../">Ceph 对象网关</a></li>
          <li class="breadcrumb-item"><a href="../">Ceph 对象网关的 S3 API</a></li>
      <li class="breadcrumb-item active">Perl S3 Examples</li>
      <li class="wy-breadcrumbs-aside">
            <a href="../../../_sources/radosgw/s3/perl.rst.txt" rel="nofollow"> View page source</a>
      </li>
  </ul>
  <hr/>
</div>
  </header>
  <div class="wy-grid-for-nav">
    
    <nav data-toggle="wy-nav-shift" class="wy-nav-side">
      <div class="wy-side-scroll">
        <div class="wy-side-nav-search"  style="background: #eee" >
          

          
            <a href="../../../" class="icon icon-home"> Ceph
          

          
          </a>

          

          
<div role="search">
  <form id="rtd-search-form" class="wy-form" action="../../../search/" method="get">
    <input type="text" name="q" placeholder="Search docs" aria-label="Search docs" />
    <input type="hidden" name="check_keywords" value="yes" />
    <input type="hidden" name="area" value="default" />
  </form>
</div>

          
        </div>

        
        <div class="wy-menu wy-menu-vertical" data-spy="affix" role="navigation" aria-label="main navigation">
          
            
            
              
            
            
              <ul class="current">
<li class="toctree-l1"><a class="reference internal" href="../../../start/">Ceph 简介</a></li>
<li class="toctree-l1"><a class="reference internal" href="../../../install/">安装 Ceph</a></li>
<li class="toctree-l1"><a class="reference internal" href="../../../cephadm/">Cephadm</a></li>
<li class="toctree-l1"><a class="reference internal" href="../../../rados/">Ceph 存储集群</a></li>
<li class="toctree-l1"><a class="reference internal" href="../../../cephfs/">Ceph 文件系统</a></li>
<li class="toctree-l1"><a class="reference internal" href="../../../rbd/">Ceph 块设备</a></li>
<li class="toctree-l1 current"><a class="reference internal" href="../../">Ceph 对象网关</a><ul class="current">
<li class="toctree-l2"><a class="reference internal" href="../../frontends/">HTTP 前端</a></li>
<li class="toctree-l2"><a class="reference internal" href="../../multisite/">多站配置</a></li>
<li class="toctree-l2"><a class="reference internal" href="../../zone-features/">域的功能</a></li>
<li class="toctree-l2"><a class="reference internal" href="../../placement/">存储池归置与存储类</a></li>
<li class="toctree-l2"><a class="reference internal" href="../../multisite-sync-policy/">多站同步策略配置</a></li>
<li class="toctree-l2"><a class="reference internal" href="../../pools/">存储池的配置</a></li>
<li class="toctree-l2"><a class="reference internal" href="../../config-ref/">配置参考</a></li>
<li class="toctree-l2"><a class="reference internal" href="../../admin/">管理指南</a></li>
<li class="toctree-l2"><a class="reference internal" href="../../account/">用户账户</a></li>
<li class="toctree-l2 current"><a class="reference internal" href="../">S3 API</a><ul class="current">
<li class="toctree-l3 current"><a class="reference internal" href="../#api">API</a><ul class="current">
<li class="toctree-l4"><a class="reference internal" href="../commons/">常见的</a></li>
<li class="toctree-l4"><a class="reference internal" href="../authentication/">认证</a></li>
<li class="toctree-l4"><a class="reference internal" href="../serviceops/">Service Ops</a></li>
<li class="toctree-l4"><a class="reference internal" href="../bucketops/">Bucket Ops</a></li>
<li class="toctree-l4"><a class="reference internal" href="../objectops/">Object Ops</a></li>
<li class="toctree-l4"><a class="reference internal" href="../cpp/">C++</a></li>
<li class="toctree-l4"><a class="reference internal" href="../csharp/">C#</a></li>
<li class="toctree-l4"><a class="reference internal" href="../java/">Java</a></li>
<li class="toctree-l4 current"><a class="current reference internal" href="#">Perl</a></li>
<li class="toctree-l4"><a class="reference internal" href="../php/">PHP</a></li>
<li class="toctree-l4"><a class="reference internal" href="../python/">Python</a></li>
<li class="toctree-l4"><a class="reference internal" href="../ruby/">Ruby AWS::SDK Examples (aws-sdk gem ~&gt;2)</a></li>
<li class="toctree-l4"><a class="reference internal" href="../ruby/#ruby-aws-s3-examples-aws-s3-gem">Ruby AWS::S3 Examples (aws-s3 gem)</a></li>
</ul>
</li>
<li class="toctree-l3"><a class="reference internal" href="../#id1">功能支持情况</a></li>
<li class="toctree-l3"><a class="reference internal" href="../#header">不支持的 Header 字段</a></li>
</ul>
</li>
<li class="toctree-l2"><a class="reference internal" href="../../iam/">IAM API</a></li>
<li class="toctree-l2"><a class="reference internal" href="../../rgw-cache/">数据缓存和 CDN</a></li>
<li class="toctree-l2"><a class="reference internal" href="../../swift/">Swift API</a></li>
<li class="toctree-l2"><a class="reference internal" href="../../adminops/">管理操作 API</a></li>
<li class="toctree-l2"><a class="reference internal" href="../../api/">Python 接口</a></li>
<li class="toctree-l2"><a class="reference internal" href="../../nfs/">通过 NFS 导出</a></li>
<li class="toctree-l2"><a class="reference internal" href="../../keystone/">与 OpenStack Keystone 对接</a></li>
<li class="toctree-l2"><a class="reference internal" href="../../barbican/">与 OpenStack Barbican 对接</a></li>
<li class="toctree-l2"><a class="reference internal" href="../../vault/">与 HashiCorp Vault 对接</a></li>
<li class="toctree-l2"><a class="reference internal" href="../../kmip/">与 KMIP 对接</a></li>
<li class="toctree-l2"><a class="reference internal" href="../../opa/">与 Open Policy Agent 对接</a></li>
<li class="toctree-l2"><a class="reference internal" href="../../multitenancy/">多租户</a></li>
<li class="toctree-l2"><a class="reference internal" href="../../compression/">压缩</a></li>
<li class="toctree-l2"><a class="reference internal" href="../../ldap-auth/">LDAP 认证</a></li>
<li class="toctree-l2"><a class="reference internal" href="../../encryption/">服务器端加密</a></li>
<li class="toctree-l2"><a class="reference internal" href="../../bucketpolicy/">桶策略</a></li>
<li class="toctree-l2"><a class="reference internal" href="../../dynamicresharding/">动态的桶索引重分片</a></li>
<li class="toctree-l2"><a class="reference internal" href="../../mfa/">多因子认证</a></li>
<li class="toctree-l2"><a class="reference internal" href="../../sync-modules/">同步模块</a></li>
<li class="toctree-l2"><a class="reference internal" href="../../notifications/">Bucket Notifications</a></li>
<li class="toctree-l2"><a class="reference internal" href="../../layout/">RADOS 中的数据布局</a></li>
<li class="toctree-l2"><a class="reference internal" href="../../STS/">STS</a></li>
<li class="toctree-l2"><a class="reference internal" href="../../STSLite/">STS Lite</a></li>
<li class="toctree-l2"><a class="reference internal" href="../../keycloak/">Keycloak</a></li>
<li class="toctree-l2"><a class="reference internal" href="../../session-tags/">Session Tags</a></li>
<li class="toctree-l2"><a class="reference internal" href="../../role/">Role</a></li>
<li class="toctree-l2"><a class="reference internal" href="../../orphans/">Orphan List and Associated Tooliing</a></li>
<li class="toctree-l2"><a class="reference internal" href="../../oidc/">OpenID Connect Provider</a></li>
<li class="toctree-l2"><a class="reference internal" href="../../troubleshooting/">故障排除</a></li>
<li class="toctree-l2"><a class="reference internal" href="../../../man/8/radosgw/">radosgw 手册页</a></li>
<li class="toctree-l2"><a class="reference internal" href="../../../man/8/radosgw-admin/">radosgw-admin 手册页</a></li>
<li class="toctree-l2"><a class="reference internal" href="../../qat-accel/">使用 QAT 为加密和压缩提速</a></li>
<li class="toctree-l2"><a class="reference internal" href="../../s3select/">S3-select</a></li>
<li class="toctree-l2"><a class="reference internal" href="../../lua-scripting/">Lua Scripting</a></li>
<li class="toctree-l2"><a class="reference internal" href="../../d3n_datacache/">D3N Data Cache</a></li>
<li class="toctree-l2"><a class="reference internal" href="../../cloud-transition/">Cloud Transition</a></li>
<li class="toctree-l2"><a class="reference internal" href="../../metrics/">Metrics</a></li>
<li class="toctree-l2"><a class="reference internal" href="../../uadk-accel/">UADK Acceleration for Compression</a></li>
<li class="toctree-l2"><a class="reference internal" href="../../bucket_logging/">桶的日志记录</a></li>
</ul>
</li>
<li class="toctree-l1"><a class="reference internal" href="../../../mgr/">Ceph 管理器守护进程</a></li>
<li class="toctree-l1"><a class="reference internal" href="../../../mgr/dashboard/">Ceph 仪表盘</a></li>
<li class="toctree-l1"><a class="reference internal" href="../../../monitoring/">监控概览</a></li>
<li class="toctree-l1"><a class="reference internal" href="../../../api/">API 文档</a></li>
<li class="toctree-l1"><a class="reference internal" href="../../../architecture/">体系结构</a></li>
<li class="toctree-l1"><a class="reference internal" href="../../../dev/developer_guide/">开发者指南</a></li>
<li class="toctree-l1"><a class="reference internal" href="../../../dev/internals/">Ceph 内幕</a></li>
<li class="toctree-l1"><a class="reference internal" href="../../../governance/">项目管理</a></li>
<li class="toctree-l1"><a class="reference internal" href="../../../foundation/">Ceph 基金会</a></li>
<li class="toctree-l1"><a class="reference internal" href="../../../ceph-volume/">ceph-volume</a></li>
<li class="toctree-l1"><a class="reference internal" href="../../../releases/general/">Ceph 版本（总目录）</a></li>
<li class="toctree-l1"><a class="reference internal" href="../../../releases/">Ceph 版本（索引）</a></li>
<li class="toctree-l1"><a class="reference internal" href="../../../security/">Security</a></li>
<li class="toctree-l1"><a class="reference internal" href="../../../hardware-monitoring/">硬件监控</a></li>
<li class="toctree-l1"><a class="reference internal" href="../../../glossary/">Ceph 术语</a></li>
<li class="toctree-l1"><a class="reference internal" href="../../../jaegertracing/">Tracing</a></li>
<li class="toctree-l1"><a class="reference internal" href="../../../translation_cn/">中文版翻译资源</a></li>
</ul>

            
          
        </div>
        
      </div>
    </nav>

    <section data-toggle="wy-nav-shift" class="wy-nav-content-wrap">

      
      <nav class="wy-nav-top" aria-label="top navigation">
        
          <i data-toggle="wy-nav-top" class="fa fa-bars"></i>
          <a href="../../../">Ceph</a>
        
      </nav>


      <div class="wy-nav-content">
        
        <div class="rst-content">
        
          <div role="main" class="document" itemscope="itemscope" itemtype="http://schema.org/Article">
           <div itemprop="articleBody">
            
<div id="dev-warning" class="admonition note">
  <p class="first admonition-title">Notice</p>
  <p class="last">This document is for a development version of Ceph.</p>
</div>
  <div id="docubetter" align="right" style="padding: 5px; font-weight: bold;">
    <a href="https://pad.ceph.com/p/Report_Documentation_Bugs">Report a Documentation Bug</a>
  </div>

  
  <section id="perl-s3-examples">
<span id="perl"></span><h1>Perl S3 Examples<a class="headerlink" href="#perl-s3-examples" title="Permalink to this heading"></a></h1>
<section id="creating-a-connection">
<h2>Creating a Connection<a class="headerlink" href="#creating-a-connection" title="Permalink to this heading"></a></h2>
<p>This creates a connection so that you can interact with the server.</p>
<div class="highlight-perl notranslate"><div class="highlight"><pre><span></span><span class="k">use</span><span class="w"> </span><span class="nn">Amazon::S3</span><span class="p">;</span>
<span class="k">my</span><span class="w"> </span><span class="nv">$access_key</span><span class="w"> </span><span class="o">=</span><span class="w"> </span><span class="s">&#39;put your access key here!&#39;</span><span class="p">;</span>
<span class="k">my</span><span class="w"> </span><span class="nv">$secret_key</span><span class="w"> </span><span class="o">=</span><span class="w"> </span><span class="s">&#39;put your secret key here!&#39;</span><span class="p">;</span>

<span class="k">my</span><span class="w"> </span><span class="nv">$conn</span><span class="w"> </span><span class="o">=</span><span class="w"> </span><span class="nn">Amazon::S3</span><span class="o">-&gt;</span><span class="k">new</span><span class="p">({</span>
<span class="w">        </span><span class="n">aws_access_key_id</span><span class="w">     </span><span class="o">=&gt;</span><span class="w"> </span><span class="nv">$access_key</span><span class="p">,</span>
<span class="w">        </span><span class="n">aws_secret_access_key</span><span class="w"> </span><span class="o">=&gt;</span><span class="w"> </span><span class="nv">$secret_key</span><span class="p">,</span>
<span class="w">        </span><span class="n">host</span><span class="w">                  </span><span class="o">=&gt;</span><span class="w"> </span><span class="s">&#39;objects.dreamhost.com&#39;</span><span class="p">,</span>
<span class="w">        </span><span class="n">secure</span><span class="w">                </span><span class="o">=&gt;</span><span class="w"> </span><span class="mi">1</span><span class="p">,</span>
<span class="w">        </span><span class="n">retry</span><span class="w">                 </span><span class="o">=&gt;</span><span class="w"> </span><span class="mi">1</span><span class="p">,</span>
<span class="p">});</span>
</pre></div>
</div>
</section>
<section id="listing-owned-buckets">
<h2>Listing Owned Buckets<a class="headerlink" href="#listing-owned-buckets" title="Permalink to this heading"></a></h2>
<p>This gets a list of <a class="reference external" href="http://search.cpan.org/~tima/Amazon-S3-0.441/lib/Amazon/S3/Bucket.pm">Amazon::S3::Bucket</a> objects that you own.
We’ll also print out the bucket name and creation date of each bucket.</p>
<div class="highlight-perl notranslate"><div class="highlight"><pre><span></span><span class="k">my</span><span class="w"> </span><span class="nv">@buckets</span><span class="w"> </span><span class="o">=</span><span class="w"> </span><span class="nv">@</span><span class="p">{</span><span class="nv">$conn</span><span class="o">-&gt;</span><span class="nn">buckets</span><span class="o">-&gt;</span><span class="p">{</span><span class="n">buckets</span><span class="p">}</span><span class="w"> </span><span class="o">||</span><span class="w"> </span><span class="o">[]</span><span class="p">};</span>
<span class="k">foreach</span><span class="w"> </span><span class="k">my</span><span class="w"> </span><span class="nv">$bucket</span><span class="w"> </span><span class="p">(</span><span class="nv">@buckets</span><span class="p">)</span><span class="w"> </span><span class="p">{</span>
<span class="w">        </span><span class="k">print</span><span class="w"> </span><span class="nv">$bucket</span><span class="o">-&gt;</span><span class="n">bucket</span><span class="w"> </span><span class="o">.</span><span class="w"> </span><span class="s">&quot;\t&quot;</span><span class="w"> </span><span class="o">.</span><span class="w"> </span><span class="nv">$bucket</span><span class="o">-&gt;</span><span class="n">creation_date</span><span class="w"> </span><span class="o">.</span><span class="w"> </span><span class="s">&quot;\n&quot;</span><span class="p">;</span>
<span class="p">}</span>
</pre></div>
</div>
<p>The output will look something like this:</p>
<div class="highlight-default notranslate"><div class="highlight"><pre><span></span><span class="n">mahbuckat1</span>   <span class="mi">2011</span><span class="o">-</span><span class="mi">04</span><span class="o">-</span><span class="mi">21</span><span class="n">T18</span><span class="p">:</span><span class="mi">05</span><span class="p">:</span><span class="mf">39.000</span><span class="n">Z</span>
<span class="n">mahbuckat2</span>   <span class="mi">2011</span><span class="o">-</span><span class="mi">04</span><span class="o">-</span><span class="mi">21</span><span class="n">T18</span><span class="p">:</span><span class="mi">05</span><span class="p">:</span><span class="mf">48.000</span><span class="n">Z</span>
<span class="n">mahbuckat3</span>   <span class="mi">2011</span><span class="o">-</span><span class="mi">04</span><span class="o">-</span><span class="mi">21</span><span class="n">T18</span><span class="p">:</span><span class="mi">07</span><span class="p">:</span><span class="mf">18.000</span><span class="n">Z</span>
</pre></div>
</div>
</section>
<section id="creating-a-bucket">
<h2>Creating a Bucket<a class="headerlink" href="#creating-a-bucket" title="Permalink to this heading"></a></h2>
<p>This creates a new bucket called <code class="docutils literal notranslate"><span class="pre">my-new-bucket</span></code></p>
<div class="highlight-perl notranslate"><div class="highlight"><pre><span></span><span class="k">my</span><span class="w"> </span><span class="nv">$bucket</span><span class="w"> </span><span class="o">=</span><span class="w"> </span><span class="nv">$conn</span><span class="o">-&gt;</span><span class="n">add_bucket</span><span class="p">({</span><span class="w"> </span><span class="n">bucket</span><span class="w"> </span><span class="o">=&gt;</span><span class="w"> </span><span class="s">&#39;my-new-bucket&#39;</span><span class="w"> </span><span class="p">});</span>
</pre></div>
</div>
</section>
<section id="listing-a-bucket-s-content">
<h2>Listing a Bucket’s Content<a class="headerlink" href="#listing-a-bucket-s-content" title="Permalink to this heading"></a></h2>
<p>This gets a list of hashes with info about each object in the bucket.
We’ll also print out each object’s name, the file size, and last
modified date.</p>
<div class="highlight-perl notranslate"><div class="highlight"><pre><span></span><span class="k">my</span><span class="w"> </span><span class="nv">@keys</span><span class="w"> </span><span class="o">=</span><span class="w"> </span><span class="nv">@</span><span class="p">{</span><span class="nv">$bucket</span><span class="o">-&gt;</span><span class="nn">list_all</span><span class="o">-&gt;</span><span class="p">{</span><span class="nb">keys</span><span class="p">}</span><span class="w"> </span><span class="o">||</span><span class="w"> </span><span class="o">[]</span><span class="p">};</span>
<span class="k">foreach</span><span class="w"> </span><span class="k">my</span><span class="w"> </span><span class="nv">$key</span><span class="w"> </span><span class="p">(</span><span class="nv">@keys</span><span class="p">)</span><span class="w"> </span><span class="p">{</span>
<span class="w">        </span><span class="k">print</span><span class="w"> </span><span class="s">&quot;$key-&gt;{key}\t$key-&gt;{size}\t$key-&gt;{last_modified}\n&quot;</span><span class="p">;</span>
<span class="p">}</span>
</pre></div>
</div>
<p>The output will look something like this:</p>
<div class="highlight-default notranslate"><div class="highlight"><pre><span></span><span class="n">myphoto1</span><span class="o">.</span><span class="n">jpg</span> <span class="mi">251262</span>  <span class="mi">2011</span><span class="o">-</span><span class="mi">08</span><span class="o">-</span><span class="mi">08</span><span class="n">T21</span><span class="p">:</span><span class="mi">35</span><span class="p">:</span><span class="mf">48.000</span><span class="n">Z</span>
<span class="n">myphoto2</span><span class="o">.</span><span class="n">jpg</span> <span class="mi">262518</span>  <span class="mi">2011</span><span class="o">-</span><span class="mi">08</span><span class="o">-</span><span class="mi">08</span><span class="n">T21</span><span class="p">:</span><span class="mi">38</span><span class="p">:</span><span class="mf">01.000</span><span class="n">Z</span>
</pre></div>
</div>
</section>
<section id="deleting-a-bucket">
<h2>Deleting a Bucket<a class="headerlink" href="#deleting-a-bucket" title="Permalink to this heading"></a></h2>
<div class="admonition note">
<p class="admonition-title">Note</p>
<p>The Bucket must be empty! Otherwise it won’t work!</p>
</div>
<div class="highlight-perl notranslate"><div class="highlight"><pre><span></span><span class="nv">$conn</span><span class="o">-&gt;</span><span class="n">delete_bucket</span><span class="p">(</span><span class="nv">$bucket</span><span class="p">);</span>
</pre></div>
</div>
</section>
<section id="forced-delete-for-non-empty-buckets">
<h2>Forced Delete for Non-empty Buckets<a class="headerlink" href="#forced-delete-for-non-empty-buckets" title="Permalink to this heading"></a></h2>
<div class="admonition attention">
<p class="admonition-title">Attention</p>
<p>not available in the <a class="reference external" href="http://search.cpan.org/~tima/Amazon-S3-0.441/lib/Amazon/S3.pm">Amazon::S3</a> perl module</p>
</div>
</section>
<section id="creating-an-object">
<h2>Creating an Object<a class="headerlink" href="#creating-an-object" title="Permalink to this heading"></a></h2>
<p>This creates a file <code class="docutils literal notranslate"><span class="pre">hello.txt</span></code> with the string <code class="docutils literal notranslate"><span class="pre">&quot;Hello</span> <span class="pre">World!&quot;</span></code></p>
<div class="highlight-perl notranslate"><div class="highlight"><pre><span></span><span class="nv">$bucket</span><span class="o">-&gt;</span><span class="n">add_key</span><span class="p">(</span>
<span class="w">        </span><span class="s">&#39;hello.txt&#39;</span><span class="p">,</span><span class="w"> </span><span class="s">&#39;Hello World!&#39;</span><span class="p">,</span>
<span class="w">        </span><span class="p">{</span><span class="w"> </span><span class="n">content_type</span><span class="w"> </span><span class="o">=&gt;</span><span class="w"> </span><span class="s">&#39;text/plain&#39;</span><span class="w"> </span><span class="p">},</span>
<span class="p">);</span>
</pre></div>
</div>
</section>
<section id="change-an-object-s-acl">
<h2>Change an Object’s ACL<a class="headerlink" href="#change-an-object-s-acl" title="Permalink to this heading"></a></h2>
<p>This makes the object <code class="docutils literal notranslate"><span class="pre">hello.txt</span></code> to be publicly readable and
<code class="docutils literal notranslate"><span class="pre">secret_plans.txt</span></code> to be private.</p>
<div class="highlight-perl notranslate"><div class="highlight"><pre><span></span><span class="nv">$bucket</span><span class="o">-&gt;</span><span class="n">set_acl</span><span class="p">({</span>
<span class="w">        </span><span class="n">key</span><span class="w">       </span><span class="o">=&gt;</span><span class="w"> </span><span class="s">&#39;hello.txt&#39;</span><span class="p">,</span>
<span class="w">        </span><span class="n">acl_short</span><span class="w"> </span><span class="o">=&gt;</span><span class="w"> </span><span class="s">&#39;public-read&#39;</span><span class="p">,</span>
<span class="p">});</span>
<span class="nv">$bucket</span><span class="o">-&gt;</span><span class="n">set_acl</span><span class="p">({</span>
<span class="w">        </span><span class="n">key</span><span class="w">       </span><span class="o">=&gt;</span><span class="w"> </span><span class="s">&#39;secret_plans.txt&#39;</span><span class="p">,</span>
<span class="w">        </span><span class="n">acl_short</span><span class="w"> </span><span class="o">=&gt;</span><span class="w"> </span><span class="s">&#39;private&#39;</span><span class="p">,</span>
<span class="p">});</span>
</pre></div>
</div>
</section>
<section id="download-an-object-to-a-file">
<h2>Download an Object (to a file)<a class="headerlink" href="#download-an-object-to-a-file" title="Permalink to this heading"></a></h2>
<p>This downloads the object <code class="docutils literal notranslate"><span class="pre">perl_poetry.pdf</span></code> and saves it in
<code class="docutils literal notranslate"><span class="pre">/home/larry/documents/</span></code></p>
<div class="highlight-perl notranslate"><div class="highlight"><pre><span></span><span class="nv">$bucket</span><span class="o">-&gt;</span><span class="n">get_key_filename</span><span class="p">(</span><span class="s">&#39;perl_poetry.pdf&#39;</span><span class="p">,</span><span class="w"> </span><span class="nb">undef</span><span class="p">,</span>
<span class="w">        </span><span class="s">&#39;/home/larry/documents/perl_poetry.pdf&#39;</span><span class="p">);</span>
</pre></div>
</div>
</section>
<section id="delete-an-object">
<h2>Delete an Object<a class="headerlink" href="#delete-an-object" title="Permalink to this heading"></a></h2>
<p>This deletes the object <code class="docutils literal notranslate"><span class="pre">goodbye.txt</span></code></p>
<div class="highlight-perl notranslate"><div class="highlight"><pre><span></span><span class="nv">$bucket</span><span class="o">-&gt;</span><span class="n">delete_key</span><span class="p">(</span><span class="s">&#39;goodbye.txt&#39;</span><span class="p">);</span>
</pre></div>
</div>
</section>
<section id="generate-object-download-urls-signed-and-unsigned">
<h2>Generate Object Download URLs (signed and unsigned)<a class="headerlink" href="#generate-object-download-urls-signed-and-unsigned" title="Permalink to this heading"></a></h2>
<p>This generates an unsigned download URL for <code class="docutils literal notranslate"><span class="pre">hello.txt</span></code>. This works
because we made <code class="docutils literal notranslate"><span class="pre">hello.txt</span></code> public by setting the ACL above.
Then this generates a signed download URL for <code class="docutils literal notranslate"><span class="pre">secret_plans.txt</span></code> that
will work for 1 hour. Signed download URLs will work for the time
period even if the object is private (when the time period is up, the
URL will stop working).</p>
<div class="admonition note">
<p class="admonition-title">Note</p>
<p>The <a class="reference external" href="http://search.cpan.org/~tima/Amazon-S3-0.441/lib/Amazon/S3.pm">Amazon::S3</a> module does not have a way to generate download
URLs, so we’re going to be using another module instead. Unfortunately,
most modules for generating these URLs assume that you are using Amazon,
so we’ve had to go with using a more obscure module, <a class="reference external" href="http://search.cpan.org/~mike/Muck-0.02/">Muck::FS::S3</a>. This
should be the same as Amazon’s sample S3 perl module, but this sample
module is not in CPAN. So, you can either use CPAN to install
<a class="reference external" href="http://search.cpan.org/~mike/Muck-0.02/">Muck::FS::S3</a>, or install Amazon’s sample S3 module manually. If you go
the manual route, you can remove <code class="docutils literal notranslate"><span class="pre">Muck::FS::</span></code> from the example below.</p>
</div>
<div class="highlight-perl notranslate"><div class="highlight"><pre><span></span><span class="k">use</span><span class="w"> </span><span class="nn">Muck::FS::S3::QueryStringAuthGenerator</span><span class="p">;</span>
<span class="k">my</span><span class="w"> </span><span class="nv">$generator</span><span class="w"> </span><span class="o">=</span><span class="w"> </span><span class="nn">Muck::FS::S3::QueryStringAuthGenerator</span><span class="o">-&gt;</span><span class="k">new</span><span class="p">(</span>
<span class="w">        </span><span class="nv">$access_key</span><span class="p">,</span>
<span class="w">        </span><span class="nv">$secret_key</span><span class="p">,</span>
<span class="w">        </span><span class="mi">0</span><span class="p">,</span><span class="w"> </span><span class="c1"># 0 means use &#39;http&#39;. set this to 1 for &#39;https&#39;</span>
<span class="w">        </span><span class="s">&#39;objects.dreamhost.com&#39;</span><span class="p">,</span>
<span class="p">);</span>

<span class="k">my</span><span class="w"> </span><span class="nv">$hello_url</span><span class="w"> </span><span class="o">=</span><span class="w"> </span><span class="nv">$generator</span><span class="o">-&gt;</span><span class="n">make_bare_url</span><span class="p">(</span><span class="nv">$bucket</span><span class="o">-&gt;</span><span class="n">bucket</span><span class="p">,</span><span class="w"> </span><span class="s">&#39;hello.txt&#39;</span><span class="p">);</span>
<span class="k">print</span><span class="w"> </span><span class="nv">$hello_url</span><span class="w"> </span><span class="o">.</span><span class="w"> </span><span class="s">&quot;\n&quot;</span><span class="p">;</span>

<span class="nv">$generator</span><span class="o">-&gt;</span><span class="n">expires_in</span><span class="p">(</span><span class="mi">3600</span><span class="p">);</span><span class="w"> </span><span class="c1"># 1 hour = 3600 seconds</span>
<span class="k">my</span><span class="w"> </span><span class="nv">$plans_url</span><span class="w"> </span><span class="o">=</span><span class="w"> </span><span class="nv">$generator</span><span class="o">-&gt;</span><span class="n">get</span><span class="p">(</span><span class="nv">$bucket</span><span class="o">-&gt;</span><span class="n">bucket</span><span class="p">,</span><span class="w"> </span><span class="s">&#39;secret_plans.txt&#39;</span><span class="p">);</span>
<span class="k">print</span><span class="w"> </span><span class="nv">$plans_url</span><span class="w"> </span><span class="o">.</span><span class="w"> </span><span class="s">&quot;\n&quot;</span><span class="p">;</span>
</pre></div>
</div>
<p>The output will look something like this:</p>
<div class="highlight-default notranslate"><div class="highlight"><pre><span></span>http://objects.dreamhost.com:80/my-bucket-name/hello.txt
http://objects.dreamhost.com:80/my-bucket-name/secret_plans.txt?Signature=XXXXXXXXXXXXXXXXXXXXXXXXXXX&amp;Expires=1316027075&amp;AWSAccessKeyId=XXXXXXXXXXXXXXXXXXX
</pre></div>
</div>
</section>
</section>



<div id="support-the-ceph-foundation" class="admonition note">
  <p class="first admonition-title">Brought to you by the Ceph Foundation</p>
  <p class="last">The Ceph Documentation is a community resource funded and hosted by the non-profit <a href="https://ceph.io/en/foundation/">Ceph Foundation</a>. If you would like to support this and our other efforts, please consider <a href="https://ceph.io/en/foundation/join/">joining now</a>.</p>
</div>


           </div>
           
          </div>
          <footer><div class="rst-footer-buttons" role="navigation" aria-label="Footer">
        <a href="../java/" class="btn btn-neutral float-left" title="Java S3 Examples" accesskey="p" rel="prev"><span class="fa fa-arrow-circle-left" aria-hidden="true"></span> Previous</a>
        <a href="../php/" class="btn btn-neutral float-right" title="PHP S3 实例" accesskey="n" rel="next">Next <span class="fa fa-arrow-circle-right" aria-hidden="true"></span></a>
    </div>

  <hr/>

  <div role="contentinfo">
    <p>&#169; Copyright 2016, Ceph authors and contributors. Licensed under Creative Commons Attribution Share Alike 3.0 (CC-BY-SA-3.0).</p>
  </div>

   

</footer>
        </div>
      </div>

    </section>

  </div>
  

  <script type="text/javascript">
      jQuery(function () {
          SphinxRtdTheme.Navigation.enable(true);
      });
  </script>

  
  
    
   

</body>
</html>